Fix a default value of the `:underline' face attribute

* lisp/cus-face.el (custom-face-attributes): Add `:position' t
default value of "On" for underlines.

diff --git a/lisp/cus-face.el b/lisp/cus-face.el
index 12ad3910fcb1f8d656572ed1cbacede3c2ed949d..80d0aaa0d513a3b4aa231f4ddab0bdc59b41f29b 100644 (file)
--- a/lisp/cus-face.el
+++ b/lisp/cus-face.el
@@ -133,7 +133,7 @@
             :help-echo "Control text underlining."
             (const :tag "Off" nil)
             (list :tag "On"
-                  :value (:color foreground-color :style line)
+                  :value (:color foreground-color :style line :position nil)
                   (const :format "" :value :color)
                   (choice :tag "Color"
                           (const :tag "Foreground Color" foreground-color)